home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload Trio 2 / Shareware Overload Trio Volume 2 (Chestnut CD-ROM).ISO / dir24 / frenchgp.zip / BYR31.ZIP / MLL.INC < prev    next >
Text File  |  1994-08-14  |  297b  |  23 lines
  1. DEBUT:
  2.   DEL LISTE
  3.   TEXTSAVE LISTE
  4. BOUCLE:
  5.  CALL MWAITP1.INC
  6.   IF NOT ERROR GOTO FIN
  7.   IF NOT CONNECTED GOTO ERREUR
  8.   GOTO BOUCLE
  9.  FIN:
  10.   ENDTEXTSAVE
  11.  CALL MDISC.INC
  12.   WAIT 1
  13.   BEEP
  14.   RETURN
  15.  
  16. ERREUR:
  17.   ENDTEXTSAVE
  18.  CALL MDISC1.INC
  19.   WAIT 30
  20.  CALL MCONNECT.INC
  21.   GOTO DEBUT
  22.  
  23.